From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 16 May 1993 21:14:05 +0000 (+0000)
Subject: (texinfo-tex-region): Update name of tex-set-buffer-directory.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96225
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=c678a343811af4a296271bbec80f061d746d1e85;p=emacs.git

(texinfo-tex-region): Update name of tex-set-buffer-directory.
---

diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el
index 32e99785e6b..203e5b17222 100644
--- a/lisp/textmodes/texinfo.el
+++ b/lisp/textmodes/texinfo.el
@@ -24,7 +24,7 @@
 
 ;;; Code:
 
-;;; Don't you dare insert any `require' calls in this file--rms.
+;;; Don't you dare insert any `require' calls at top level in this file--rms.
 
 (defvar texinfo-mode-syntax-table nil)
 
@@ -403,10 +403,10 @@ tex-trailer is appended to the temporary file after the region."
           ;; make sure trailer isn't hidden by a comment
           (insert-string "\n")
           (if local-tex-trailer (insert-string local-tex-trailer))
-          (set-buffer-directory temp-buffer zap-directory)
+          (tex-set-buffer-directory temp-buffer zap-directory)
           (write-region (point-min) (point-max) tex-out-file t nil))))
     
-    (set-buffer-directory "*tex-shell*" zap-directory)
+    (tex-set-buffer-directory "*tex-shell*" zap-directory)
     (send-string "tex-shell" (concat tex-shell-cd-command " "
                                      zap-directory "\n"))
     (send-string "tex-shell" (concat texinfo-tex-command " "